home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 11 / AMUG BBS in a Box Volume XI (April 1994) (MacWizards).iso / Files / Hyper / Hy-Hyperi / HyperCard Class.sit / HyperCard Class / HyperCard Class.rsrc / STR#_10000.txt < prev   
Encoding:
Text File  |  1990-09-03  |  2.3 KB  |  167 lines
  1. Steve Maller‚Äôs ResCopy Development Version 
  2.  
  3. ‚ÄúThe advancement and diffusion of knowledge
  4.  
  5. is the only guardian of true liberty.‚Äù
  6.  
  7. James Madison
  8.  
  9. answer "That file is locked or busy." with "Sorry"
  10.  
  11. answer "
  12.  
  13. Cancel
  14.  
  15. choose browse tool
  16.  
  17. answer "That file cannot be opened." with "Sorry"
  18.  
  19. This stack cannot be opened. Try unlocking the file and/or the disk...
  20.  
  21. Convert all
  22.  
  23. gResCopySounds
  24.  
  25. go to this card
  26.  
  27. go back
  28.  
  29. go home
  30.  
  31. go to stack "
  32.  
  33. AA55AA55AA55AA55
  34.  
  35. ResCopy Help
  36.  
  37. hide 
  38.  
  39. Your changes to the Home stack have been recorded, but may not take effect until you quit and restart HyperCard.
  40.  
  41. home
  42.  
  43. the short name of "
  44.  
  45. " = "Home"
  46.  
  47. it
  48.  
  49. Sorry, but the stack ‚Äú
  50.  
  51. ‚Äù doesn‚Äôt have a resource fork and is locked. Error = 
  52.  
  53. set lockMessages to true
  54.  
  55. set lockscreen to true
  56.  
  57. msg
  58.  
  59. ask "New number for this resource:" with "
  60.  
  61. ask "New name for this resource:" with "
  62.  
  63. No
  64.  
  65. answer "Not enough memory to run ResCopy." with "Bye"
  66.  
  67. answer "Not enough memory to copy resource." with "OK"
  68.  
  69. answer "Not enough memory to play sound" with "OK"
  70.  
  71. answer "This stack has no resource fork; create one?" with "Yes" or "No"
  72.  
  73. answer "I am missing some of my resources!" with "Oops"
  74.  
  75. answer "File or Volume is locked. Open read-only?" with "Yes" or "No"
  76.  
  77.  exists. Replace?" with "Yes" or "No"
  78.  
  79.  exists. Replace?" with "Rename" or "Yes" or "No"
  80.  
  81.  exists. Replace?" with "Renumber" or "Yes" or "No"
  82.  
  83. pattern window
  84.  
  85. play "
  86.  
  87. pop card
  88.  
  89. push card
  90.  
  91. Oops! This file contains too many resources for ResCopy to display. You can still work with the file, but some of the resources will not be displayed.
  92.  
  93. answer "Remove 
  94.  
  95. ?" with "Yes" or "No" or "Cancel"
  96.  
  97. Rename
  98.  
  99. Renumber
  100.  
  101. answer "Oops, this resource file can‚Äôt be changed." with "Oh‚Ķ"
  102.  
  103. ask "That name already exists! Enter another:" with "
  104.  
  105. ask "That number already exists! Enter another:" with "
  106.  
  107. set cursor to busy
  108.  
  109. set cursor to 4
  110.  
  111. show 
  112.  
  113. show menubar
  114.  
  115.  bytes
  116.  
  117. answer "Convert sound to HyperCard format?" with "No" or "Yes" or "Convert all"
  118.  
  119.  
  120.  
  121. the long name of 
  122.  
  123. STAK
  124.  
  125. play stop
  126.  
  127. the message
  128.  
  129. this stack
  130.  
  131.  to 
  132.  
  133. tool window
  134.  
  135. true
  136.  
  137. set lockMessages to false
  138.  
  139. set lockScreen to false
  140.  
  141. unlock screen with visual dissolve
  142.  
  143. the visible of 
  144.  
  145. visual effect dissolve fast
  146.  
  147. wait until the sound is "done"
  148.  
  149. the version > 1.1
  150.  
  151. answer "Oops, not a playable Hypercard sound." with "Oh‚Ķ"
  152.  
  153. Yes
  154.  
  155. 380044004400FE00FE00FE00FE00FE00
  156.  
  157. Edit
  158.  
  159. Rename…
  160.  
  161. ‚åòR
  162.  
  163. Renumber…
  164.  
  165. ‚åòN
  166.  
  167.